home *** CD-ROM | disk | FTP | other *** search
/ Programmer Power Tools / Programmer Power Tools.iso / microcrn / issue_40.arc / DAIMS.ARC / EKMAN.HXX < prev    next >
Encoding:
Text File  |  1988-02-10  |  1.0 KB  |  40 lines
  1. /* 
  2. -*++ class ekman_layer: 
  3. ** 
  4. ** (*++ history: 
  5. **     13 Jan 88    Bruce Eckel    Creation date
  6. ** ++*)
  7. ** 
  8. ** (*++ detailed: Creates the ekman layer based on a number of possible
  9. ** inputs: command line, Sunview panel, etc.
  10. ** ++*)
  11. */
  12.  
  13. class ocean_layer;
  14. class Cheb_vector;
  15. class phys_vector;
  16. class ekpanel;
  17.  
  18. class ekman_layer {
  19.     Cheb_vector ekman_pumping_vector;
  20.     phys_vector ekman_physical_vector;
  21.     double dc_value ;
  22.     double ac_value ;
  23.     int ac_waves ;
  24.     int nmodes ;
  25.     double xldomain;
  26.     double xrdomain;
  27.   public:
  28.     ekman_layer(int initial_modes = 32);
  29.     double dc() { return dc_value; }
  30.     double ac() { return ac_value; }
  31.     int waves() { return ac_waves; }
  32.     int modes() { return nmodes; }
  33.     double xldom() { return xldomain; }
  34.     double xrdom() { return xrdomain; }
  35.     void step() {;}
  36.     void update(ekpanel & ekman_control_panel);
  37.     Cheb_vector & pumping_vector() { return ekman_pumping_vector; }
  38.     int resolution() { return nmodes; }
  39. };
  40.